← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 16:10:05 2022
Reported on Wed Dec 14 16:12:58 2022

Filename(eval 419)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 32 statements in 497µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
22267µs94.3sOpenAPI::Modern::::newOpenAPI::Modern::new
11117µs49µsOpenAPI::Modern::::BEGIN@7OpenAPI::Modern::BEGIN@7
1117µs7µsOpenAPI::Modern::::BEGIN@12.300OpenAPI::Modern::BEGIN@12.300
1116µs21µsOpenAPI::Modern::::BEGIN@43OpenAPI::Modern::BEGIN@43
1116µs17µsOpenAPI::Modern::::BEGIN@48OpenAPI::Modern::BEGIN@48
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $isa_check_for_evaluator = ${$_[1]->{"\$isa_check_for_evaluator"}};
310s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
410s my $isa_check_for_openapi_5fdocument = ${$_[1]->{"\$isa_check_for_openapi_5fdocument"}};
510s my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
6 package OpenAPI::Modern;
7258µs281µs
# spent 49µs (17+32) within OpenAPI::Modern::BEGIN@7 which was called: # once (17µs+32µs) by Sub::Quote::_clean_eval at line 7
no warnings 'closure';
# spent 49µs making 1 call to OpenAPI::Modern::BEGIN@7 # spent 32µs making 1 call to warnings::unimport
8
# spent 94.3s (67µs+94.3) within OpenAPI::Modern::new which was called 2 times, avg 47.1s/call: # once (56µs+94.3s) by main::RUNTIME at line 177 of Sub/Defer.pm # once (11µs+1.61ms) by main::RUNTIME at line 6 of /Users/ether/git/fastly/Heavenly/profiling/jsm-0.558-om-0.037/../prof.pl
sub new {
9 ($_QUOTED,$_UNQUOTED) if 0;
10# BEGIN quote_sub PRELUDE
11package OpenAPI::Modern;
12
# spent 7µs within OpenAPI::Modern::BEGIN@12.300 which was called: # once (7µs+0s) by Sub::Quote::_clean_eval at line 17
BEGIN {
1310s $^H = 2018;
1411µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1518µs %^H = (
16 );
171166µs17µs}
# spent 7µs making 1 call to OpenAPI::Modern::BEGIN@12.300
18# END quote_sub PRELUDE
1911µs my $invoker = CORE::shift();
2010s my $class = CORE::ref($invoker) ? CORE::ref($invoker) : $invoker;
2111µs if ($class ne "OpenAPI::Modern") {
22 if ($Moo::MAKERS{$class}) {
23 if ($Moo::MAKERS{$class}{constructor}) {
24 package OpenAPI::Modern;
25 return $invoker->SUPER::new(@_);
26 }
27 Moo->_constructor_maker_for($class);
28 return $invoker->new(@_);
29 } elsif ($INC{"Moose.pm"} and my $meta = Class::MOP::get_metaclass_by_name($class)) {
30 return $meta->new_object(
31 $class->can("BUILDARGS") ? $class->BUILDARGS(@_)
32 : $class->Moo::Object::BUILDARGS(@_)
33 );
34 }
35 }
36116µs194.3s my $args = $class->BUILDARGS(@_);
# spent 94.3s making 1 call to OpenAPI::Modern::BUILDARGS
3710s Carp::croak("BUILDARGS did not return a hashref") unless CORE::ref($args) eq 'HASH';
3811µs if (my @missing = grep !exists $args->{$_}, "evaluator", "openapi_document") {
39 Carp::croak("Missing required arguments: ".CORE::join(', ', sort @missing));
40 }
4117µs my $new = bless({}, $class);;
4210s(exists $args->{"evaluator"} and ($new->{"evaluator"} = scalar do { my $value = $args->{"evaluator"};
43594µs438µs
# spent 21µs (6+15) within OpenAPI::Modern::BEGIN@43 which was called: # once (6µs+15µs) by Sub::Quote::_clean_eval at line 43
(do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern]))) or Type::Tiny::_failed_check($isa_check_for_evaluator, "InstanceOf[\"JSON::Schema::Modern\"]", $value, "attribute_name","evaluator","attribute_step","isa check","mgaca","0","varname","\$args->{\"evaluator\"}"); $value }),
# spent 21µs making 1 call to OpenAPI::Modern::BEGIN@43 # spent 15µs making 1 call to warnings::unimport # spent 1µs making 1 call to Scalar::Util::blessed # spent 1µs making 1 call to UNIVERSAL::isa
44 $value
45}
46)),
47221µs(exists $args->{"openapi_document"} and ($new->{"openapi_document"} = scalar do { my $value = $args->{"openapi_document"};
485115µs428µs
# spent 17µs (6+11) within OpenAPI::Modern::BEGIN@48 which was called: # once (6µs+11µs) by Sub::Quote::_clean_eval at line 48
(do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern::Document::OpenAPI]))) or Type::Tiny::_failed_check($isa_check_for_openapi_5fdocument, "InstanceOf[\"JSON::Schema::Modern::Document::OpenAPI\"]", $value, "attribute_name","openapi_document","attribute_step","isa check","mgaca","0","varname","\$args->{\"openapi_document\"}"); $value }),
# spent 17µs making 1 call to OpenAPI::Modern::BEGIN@48 # spent 11µs making 1 call to warnings::unimport # spent 0s making 1 call to Scalar::Util::blessed # spent 0s making 1 call to UNIVERSAL::isa
49 $value
50}
51)),
52 return $new;
53 }
5411µs $$_UNQUOTED = \&new;
55}
5616µs1;
57
58;